home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / datescrn.arc / PRT_CTL.C < prev    next >
Text File  |  1985-12-12  |  1KB  |  47 lines
  1. /*  prt_ctl()  */
  2. /*  This function parses the string passed into a series of integers */
  3. /*  separated by non-spaces, and sends each integer to the printer as */
  4. /*  a printer control sequence.  */
  5. #include <ctype.h>
  6. #include <stdio.h>
  7.  
  8. prt_ctl(prt_code)
  9. char prt_code[];
  10. #define   NULL   0
  11. #define   SPACE  32
  12.  
  13. {
  14.      extern FILE *f1;
  15.  
  16.      char code[6];
  17.      int length, c, num, x, y;
  18.      
  19.      length = strlen(prt_code);
  20.      num = y = 0;
  21.      setmem(code, 6, NULL);
  22.  
  23.      for (x=0; x <= length; x++)  {
  24.           if ((c=isdigit(prt_code[x])) > 0)  {
  25.                code[y] = prt_code[x];
  26.                if ((++y) > 5)  {
  27.                     code[y] = NULL;
  28.                     stcd_i(code, &num);
  29.                     fprintf(f1, "%c", num);
  30.                     setmem(code, 6, NULL);
  31.                     y = 0;
  32.                }
  33.           }  else  {
  34.                if (prt_code[x] != SPACE)  {
  35.                     if (y > 0)  {
  36.                          code[y] = NULL;
  37.                          stcd_i(code, &num);
  38.                          fprintf(f1, "%c", num);
  39.                          setmem(code, 6, NULL);
  40.                          y = 0;
  41.                     }
  42.                }
  43.           }
  44.      }
  45. }
  46.  
  47.